From acf9306393d7428a8f59b00ed971e9774719ed49 Mon Sep 17 00:00:00 2001
From: "Reyesrivera, Jose" <reyesriv@msu.edu>
Date: Thu, 3 Oct 2019 17:50:58 -0400
Subject: [PATCH] add pv coeff for 0,1 jets
---
.DS_Store | Bin 6148 -> 6148 bytes
feynamps/ggH_PV.m | 9 +
feynamps/ggHg_PV.m | 141 +
pvcoefficients/ggH_coeff.txt | 4 +
pvcoefficients/ggHg_coeff.txt | 18 +
scripts/X_LoopRefining_0and1jets.nb | 102948 +++++++++++++++++++++++++
6 files changed, 103120 insertions(+)
create mode 100644 feynamps/ggH_PV.m
create mode 100644 feynamps/ggHg_PV.m
create mode 100644 pvcoefficients/ggH_coeff.txt
create mode 100644 pvcoefficients/ggHg_coeff.txt
create mode 100644 scripts/X_LoopRefining_0and1jets.nb
diff --git a/.DS_Store b/.DS_Store
index 35e43cd7bc5e89203d09fa832511c6164a74272f..cea4e01f81e971d0a9e9256f060c51e7307e1567 100644
GIT binary patch
delta 17
YcmZoMXffDe$<D|)vGD9>c8<UN05nzw_y7O^
delta 15
WcmZoMXffDe$v(00+-7!;zx)6%mj(9#
diff --git a/feynamps/ggH_PV.m b/feynamps/ggH_PV.m
new file mode 100644
index 00000000..89ae3bd2
--- /dev/null
+++ b/feynamps/ggH_PV.m
@@ -0,0 +1,9 @@
+(* Created with the Wolfram Language for Students - Personal Use Only : www.wolfram.com *)
+(Alfas*EL*MT^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]])*
+ PVC[0, 0, 0, 0, MH^2, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/2 +
+ 4*Pair[e[1], k[2]]*Pair[e[2], k[1]]*PVC[0, 1, 1, 0, MH^2, 0, Sqrt[MT^2],
+ Sqrt[MT^2], Sqrt[MT^2]] + Pair[e[1], e[2]]*
+ (PVB[0, 0, MH^2, Sqrt[MT^2], Sqrt[MT^2]] -
+ 4*PVC[1, 0, 0, 0, MH^2, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])))/
+ (MW*Pi*SW)
diff --git a/feynamps/ggHg_PV.m b/feynamps/ggHg_PV.m
new file mode 100644
index 00000000..f1a7d7fe
--- /dev/null
+++ b/feynamps/ggHg_PV.m
@@ -0,0 +1,141 @@
+(* 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}}}][
+ (Alfas*EL*GS*MT^2*Mat[SUNT[Glu1, Glu2, Glu4, 0, 0]]*
+ ((-(((-MH^2 + U)*Pair[e[1], k[4]]*Pair[e[2], ec[4]] -
+ 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]]*
+ 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]]))*PVC[0, 0, 0, 0, U, MH^2, Sqrt[MT^2],
+ Sqrt[MT^2], Sqrt[MT^2]]) - (2*(-MH^2 + 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*(-MH^2 + 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]]))*PVC[0, 0, 1, 0, U, MH^2, Sqrt[MT^2],
+ Sqrt[MT^2], Sqrt[MT^2]] - 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]]))*PVC[0, 0, 2, 0, U, MH^2,
+ Sqrt[MT^2], Sqrt[MT^2], Sqrt[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]]))*PVC[0, 1, 1, 0, U, MH^2,
+ Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^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]])*(PVB[0, 0, U, Sqrt[MT^2], Sqrt[MT^2]] -
+ 4*PVC[1, 0, 0, 0, U, MH^2, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]]))/U +
+ (-(((-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]]))*
+ PVC[0, 0, 0, MH^2, S, 0, Sqrt[MT^2], 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]]))*
+ PVC[0, 1, 0, MH^2, S, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]] -
+ 2*((-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]]*
+ (PVC[0, 1, 1, MH^2, S, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]] +
+ PVC[0, 2, 0, MH^2, S, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^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]]))*(PVB[0, 0, S, Sqrt[MT^2], Sqrt[MT^2]] -
+ 4*PVC[1, 0, 0, MH^2, S, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]]))/S -
+ (-((((S + U)*Pair[e[1], k[2]] - S*Pair[e[1], k[3]])*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]]) + 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]]))*PVC[0, 0, 0, MH^2, T, 0, Sqrt[MT^2],
+ Sqrt[MT^2], Sqrt[MT^2]]) -
+ ((2*(S + U)*Pair[e[1], k[2]] + (-3*S + U)*Pair[e[1], k[3]])*
+ 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]]) +
+ 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]]))*PVC[0, 1, 0, MH^2, T, 0,
+ Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]] -
+ 2*(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]]))*PVC[0, 1, 1, MH^2, T, 0, Sqrt[MT^2],
+ Sqrt[MT^2], Sqrt[MT^2]] + 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]]))*
+ PVC[0, 2, 0, MH^2, T, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]]) +
+ (-((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]])*(PVB[0, 0, T, Sqrt[MT^2], Sqrt[MT^2]] -
+ 4*PVC[1, 0, 0, MH^2, T, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]]))/T))/
+ (MW*Pi*SW) - (Alfas*EL*GS*MT^2*Mat[SUNT[Glu1, Glu4, Glu2, 0, 0]]*
+ ((-(((-MH^2 + U)*Pair[e[1], k[4]]*Pair[e[2], ec[4]] -
+ 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]]*
+ 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]]))*PVC[0, 0, 0, 0, U, MH^2, Sqrt[MT^2],
+ Sqrt[MT^2], Sqrt[MT^2]]) - (2*(-MH^2 + 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*(-MH^2 + 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]]))*PVC[0, 0, 1, 0, U, MH^2, Sqrt[MT^2],
+ Sqrt[MT^2], Sqrt[MT^2]] - 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]]))*PVC[0, 0, 2, 0, U, MH^2,
+ Sqrt[MT^2], Sqrt[MT^2], Sqrt[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]]))*PVC[0, 1, 1, 0, U, MH^2,
+ Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^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]])*(PVB[0, 0, U, Sqrt[MT^2], Sqrt[MT^2]] -
+ 4*PVC[1, 0, 0, 0, U, MH^2, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]]))/U +
+ (-(((-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]]))*
+ PVC[0, 0, 0, MH^2, S, 0, Sqrt[MT^2], 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]]))*
+ PVC[0, 1, 0, MH^2, S, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]] -
+ 2*((-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]]*
+ (PVC[0, 1, 1, MH^2, S, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]] +
+ PVC[0, 2, 0, MH^2, S, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^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]]))*(PVB[0, 0, S, Sqrt[MT^2], Sqrt[MT^2]] -
+ 4*PVC[1, 0, 0, MH^2, S, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]]))/S -
+ (-((((S + U)*Pair[e[1], k[2]] - S*Pair[e[1], k[3]])*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]]) + 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]]))*PVC[0, 0, 0, MH^2, T, 0, Sqrt[MT^2],
+ Sqrt[MT^2], Sqrt[MT^2]]) -
+ ((2*(S + U)*Pair[e[1], k[2]] + (-3*S + U)*Pair[e[1], k[3]])*
+ 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]]) +
+ 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]]))*PVC[0, 1, 0, MH^2, T, 0,
+ Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]] -
+ 2*(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]]))*PVC[0, 1, 1, MH^2, T, 0, Sqrt[MT^2],
+ Sqrt[MT^2], Sqrt[MT^2]] + 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]]))*
+ PVC[0, 2, 0, MH^2, T, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]]) +
+ (-((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]])*(PVB[0, 0, T, Sqrt[MT^2], Sqrt[MT^2]] -
+ 4*PVC[1, 0, 0, MH^2, T, 0, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]]))/T))/
+ (MW*Pi*SW)]
diff --git a/pvcoefficients/ggH_coeff.txt b/pvcoefficients/ggH_coeff.txt
new file mode 100644
index 00000000..b8eae851
--- /dev/null
+++ b/pvcoefficients/ggH_coeff.txt
@@ -0,0 +1,4 @@
+PVB[0,0,MH^2,Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,0,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,1,0,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[1,0,0,0,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
diff --git a/pvcoefficients/ggHg_coeff.txt b/pvcoefficients/ggHg_coeff.txt
new file mode 100644
index 00000000..fc0d4805
--- /dev/null
+++ b/pvcoefficients/ggHg_coeff.txt
@@ -0,0 +1,18 @@
+PVB[0,0,S,Sqrt[MT^2],Sqrt[MT^2]]
+PVB[0,0,T,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,S,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,1,0,U,MH^2,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,S,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,1,0,U,MH^2,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,1,MH^2,S,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,2,0,MH^2,S,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[1,0,0,0,U,MH^2,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[1,0,0,MH^2,S,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]]
diff --git a/scripts/X_LoopRefining_0and1jets.nb b/scripts/X_LoopRefining_0and1jets.nb
new file mode 100644
index 00000000..259b0f9c
--- /dev/null
+++ b/scripts/X_LoopRefining_0and1jets.nb
@@ -0,0 +1,102948 @@
+(* 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[ 4727157, 102940]
+NotebookOptionsPosition[ 4685092, 102393]
+NotebookOutlinePosition[ 4685445, 102409]
+CellTagsIndexPosition[ 4685402, 102406]
+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", " ", "+", " ",
+ RowBox[{
+ RowBox[{"(", "g", ")"}], " ", "\[IndentingNewLine]",
+ RowBox[{"Model", ":", " ", "SMQCD"}]}]}]}], ",", " ",
+ RowBox[{
+ "Last", " ", "Modified", " ", "October", " ", "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.7791271781333838`*^9,
+ 3.779127187089452*^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[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.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, {3.7791271979663363`*^9, 3.779127217668456*^9}},
+ CellLabel->
+ "During evaluation of \
+In[1]:=",ExpressionUUID->"0faa258c-cb99-4ffa-abdc-8a866ea3d423"],
+
+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.77851079981749*^9, {3.7791271979663363`*^9, 3.7791272176839657`*^9}},
+ CellLabel->
+ "During evaluation of \
+In[1]:=",ExpressionUUID->"68a135c8-1ea0-4213-881d-6b4d19bc89ac"]
+}, 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[5]:=",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[6]:=",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[{"(*", " ",
+ RowBox[{
+ RowBox[{"g", " ", "+", " ", "g"}], " ", "\[Rule]", " ", "H"}], " ",
+ "*)"}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{
+ RowBox[{"SetDirectory", "[",
+ RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ";"}],
+ "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"SetDirectory", "[",
+ RowBox[{"StringJoin", "[",
+ RowBox[{
+ RowBox[{"ParentDirectory", "[", "]"}], ",", "\"\</feynamps\>\""}],
+ "]"}], "]"}], ";"}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"jets0", " ", "=", " ",
+ RowBox[{"Import", "[", "\"\<ggH.m\>\"", "]"}]}], ";"}],
+ "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"jets0", " ", "=", " ",
+ RowBox[{
+ RowBox[{
+ RowBox[{"jets0", "//.", "MAT"}], "//.", " ", "MATColor"}], " ", "//.",
+ " ", "SubDen"}]}], ";"}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"jets0PV", " ", "=", " ",
+ RowBox[{"Collect", "[",
+ RowBox[{
+ RowBox[{"ReleaseHold", "[",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"HoldForm", "[",
+ RowBox[{"Evaluate", "[", "jets0", "]"}], "]"}], " ", ")"}], "//.",
+ " ", "RIntList"}], ")"}], "]"}], ",",
+ RowBox[{"Mat", "[", "__", "]"}]}], "]"}]}], ";"}],
+ "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"Export", "[",
+ RowBox[{"\"\<ggH_PV.m\>\"", ",", "jets0PV"}], "]"}], ";"}]}]}]], "Input",\
+
+ CellChangeTimes->{{3.779127552592814*^9, 3.779127572850503*^9},
+ 3.779127606378036*^9},
+ CellLabel->"In[24]:=",ExpressionUUID->"9fe10d31-521c-4fe7-844e-895b7b5e190a"],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"(*", " ",
+ RowBox[{
+ RowBox[{"g", " ", "+", " ", "g"}], " ", "\[Rule]", " ",
+ RowBox[{"H", " ", "+", " ", "g"}]}], " ", "*)"}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{
+ RowBox[{"SetDirectory", "[",
+ RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ";"}],
+ "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"SetDirectory", "[",
+ RowBox[{"StringJoin", "[",
+ RowBox[{
+ RowBox[{"ParentDirectory", "[", "]"}], ",", "\"\</feynamps\>\""}],
+ "]"}], "]"}], ";"}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"jets1", " ", "=", " ",
+ RowBox[{"Import", "[", "\"\<ggHg.m\>\"", "]"}]}], ";"}],
+ "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"jets1", " ", "=", " ",
+ RowBox[{
+ RowBox[{
+ RowBox[{"jets1", "//.", "MAT"}], "//.", " ", "MATColor"}], " ", "//.",
+ " ", "SubDen"}]}], ";"}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"jets1PV", " ", "=", " ",
+ RowBox[{"Collect", "[",
+ RowBox[{
+ RowBox[{"ReleaseHold", "[",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"HoldForm", "[",
+ RowBox[{"Evaluate", "[", "jets1", "]"}], "]"}], " ", ")"}], "//.",
+ " ", "RIntList"}], ")"}], "]"}], ",",
+ RowBox[{"Mat", "[", "__", "]"}]}], "]"}]}], ";"}],
+ "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"Export", "[",
+ RowBox[{"\"\<ggHg_PV.m\>\"", ",", "jets1PV"}], "]"}], ";"}],
+ "\[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}, {3.779127235327127*^9, 3.779127271388174*^9}, {
+ 3.779127318331149*^9, 3.7791273790830193`*^9}, {3.779127417182901*^9,
+ 3.7791274626923656`*^9}, {3.7791275054082212`*^9, 3.779127545503696*^9}},
+ CellLabel->"In[30]:=",ExpressionUUID->"6f54e202-a28b-4a1d-9e81-76bb7154ddaa"],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]",
+ RowBox[{"(*", " ",
+ RowBox[{"Here", " ", "the", " ", "program", " ",
+ RowBox[{"pv", ".", "py"}], " ", "is", " ", "used", " ", "to", " ",
+ "produce", " ", "the", " ", "lists", " ", "of", " ", "PV", " ",
+ "coefficients"}], " ", "*)"}], "\[IndentingNewLine]",
+ RowBox[{"(*", " ",
+ RowBox[{"Do", ":", "\[IndentingNewLine]", " ",
+ RowBox[{
+ RowBox[{"python", " ",
+ RowBox[{"pv", ".", "py"}], " ", "\"\<../feynamps/ggH_PV.m\>\""}], " ",
+ "|", " ",
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"sort", " ", "-", "u"}], " ", ">"}], " ", ".."}], "/",
+ "pvcoefficients"}], "/",
+ RowBox[{"ggH_coeff", ".", "txt"}]}], "\n", " ", "python", " ",
+ RowBox[{"pv", ".", "py"}], " ", "\"\<../feynamps/ggHg_PV.m\>\""}], " ",
+ "|", " ",
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"sort", " ", "-", "u"}], " ", ">"}], " ", ".."}], "/",
+ "pvcoefficients"}], "/",
+ RowBox[{"ggHg_coeff", ".", "txt"}]}]}]}], "\[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}, {
+ 3.7791280023926783`*^9,
+ 3.779128054274996*^9}},ExpressionUUID->"476a37c6-482c-4f61-9ced-\
+5d80a625711e"],
+
+Cell[BoxData[""], "Input",
+ CellChangeTimes->{{3.770010869763611*^9, 3.770010879310418*^9},
+ 3.7791276308023233`*^9},ExpressionUUID->"705b77c9-9d55-4c91-a174-\
+596c11435d8d"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+ RowBox[{"SetDirectory", "[",
+ RowBox[{"NotebookDirectory", "[", "]"}], "]"}],
+ ";"}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"SetDirectory", "[",
+ RowBox[{"StringJoin", "[",
+ RowBox[{
+ RowBox[{"ParentDirectory", "[", "]"}], ",", "\"\</pvcoefficients\>\""}],
+ "]"}], "]"}], ";"}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"ggHListPV", "=",
+ RowBox[{"ToExpression", "[",
+ RowBox[{"Import", "[",
+ RowBox[{"\"\<ggH_coeff.txt\>\"", ",", "\"\<Lines\>\""}], "]"}], "]"}]}],
+ ";"}], "\[IndentingNewLine]",
+ RowBox[{"Length", "[", "ggHListPV", "]"}], "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"ggHgListPV", "=",
+ RowBox[{"ToExpression", "[",
+ RowBox[{"Import", "[",
+ RowBox[{"\"\<ggHg_coeff.txt\>\"", ",", "\"\<Lines\>\""}], "]"}], "]"}]}],
+ ";"}], "\[IndentingNewLine]",
+ RowBox[{"Length", "[", "ggHgListPV", "]"}]}], "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}, {3.779128063000547*^9, 3.779128199066687*^9}},
+ CellLabel->"In[48]:=",ExpressionUUID->"fd0c50cb-5e3d-46b2-a09e-275f25c954a6"],
+
+Cell[BoxData["4"], "Output",
+ CellChangeTimes->{{3.779128180092963*^9, 3.779128200605661*^9}},
+ CellLabel->"Out[51]=",ExpressionUUID->"323cb7f2-c40f-4754-9540-9426135ece5f"],
+
+Cell[BoxData["18"], "Output",
+ CellChangeTimes->{{3.779128180092963*^9, 3.779128200620792*^9}},
+ CellLabel->"Out[53]=",ExpressionUUID->"2a34b402-4c25-4558-979d-a670f2211d0a"]
+}, Open ]],
+
+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, 1181, 26, 94, "Input",ExpressionUUID->"a9eb43f9-c437-4ff0-ae8b-eb31f4d06b38"],
+Cell[CellGroupData[{
+Cell[1764, 50, 636, 12, 94, "Input",ExpressionUUID->"aa6e76d2-ec10-49c0-b6e0-1dd4d91b1a18"],
+Cell[CellGroupData[{
+Cell[2425, 66, 1868, 27, 46, "Print",ExpressionUUID->"0faa258c-cb99-4ffa-abdc-8a866ea3d423"],
+Cell[4296, 95, 1736, 26, 101, "Print",ExpressionUUID->"68a135c8-1ea0-4213-881d-6b4d19bc89ac"]
+}, Open ]]
+}, Open ]],
+Cell[6059, 125, 1328, 31, 94, "Input",ExpressionUUID->"1c12ba0e-fd6c-4b7e-8de6-2b784fa72d92"],
+Cell[7390, 158, 10660, 257, 1165, "Input",ExpressionUUID->"a5c5e12e-157e-4719-b09d-930d037e0d1b"],
+Cell[18053, 417, 371, 6, 30, "Input",ExpressionUUID->"7741718d-edbc-49e5-a241-fb84c7107f7d"],
+Cell[18427, 425, 1621, 46, 157, "Input",ExpressionUUID->"9fe10d31-521c-4fe7-844e-895b7b5e190a"],
+Cell[20051, 473, 2246, 53, 178, "Input",ExpressionUUID->"6f54e202-a28b-4a1d-9e81-76bb7154ddaa"],
+Cell[22300, 528, 1479, 36, 136, "Input",ExpressionUUID->"476a37c6-482c-4f61-9ced-5d80a625711e"],
+Cell[23782, 566, 177, 3, 30, "Input",ExpressionUUID->"705b77c9-9d55-4c91-a174-596c11435d8d"],
+Cell[CellGroupData[{
+Cell[23984, 573, 1564, 33, 136, "Input",ExpressionUUID->"fd0c50cb-5e3d-46b2-a09e-275f25c954a6"],
+Cell[25551, 608, 173, 2, 34, "Output",ExpressionUUID->"323cb7f2-c40f-4754-9540-9426135ece5f"],
+Cell[25727, 612, 174, 2, 34, "Output",ExpressionUUID->"2a34b402-4c25-4558-979d-a670f2211d0a"]
+}, Open ]],
+Cell[25916, 617, 261, 6, 52, "Input",ExpressionUUID->"f1052ac6-e6f7-4371-afd6-ad461c58d053"],
+Cell[26180, 625, 810, 18, 73, "Input",ExpressionUUID->"47c35d70-ef0a-4ee5-9de6-a89da37d395a"],
+Cell[26993, 645, 263, 6, 52, "Input",ExpressionUUID->"e49bfcd0-2790-4662-b260-1251fbf55656"],
+Cell[27259, 653, 740, 18, 73, "Input",ExpressionUUID->"7c31e5a1-c9d7-4139-bcbf-d567355f68ac"],
+Cell[28002, 673, 263, 6, 52, "Input",ExpressionUUID->"df0e2446-e8a9-4c0f-ade0-6243ed23f014"],
+Cell[28268, 681, 704, 19, 73, "Input",ExpressionUUID->"b7439b12-cb51-47a1-a158-9fa93f157c7d"],
+Cell[28975, 702, 266, 6, 52, "Input",ExpressionUUID->"ba9ecf49-d2ba-4baa-bc4a-47072a88303d"],
+Cell[29244, 710, 683, 20, 73, "Input",ExpressionUUID->"c1cc9921-c84f-4990-9a13-a36935fe08f6"],
+Cell[29930, 732, 256, 5, 30, "Input",ExpressionUUID->"b325e442-757f-4122-a460-9727e5485960"],
+Cell[30189, 739, 435, 9, 30, "Input",ExpressionUUID->"64072172-75c1-400c-b4be-a5a76fc27e9f"],
+Cell[30627, 750, 607, 13, 52, "Input",ExpressionUUID->"75ac93f2-7474-4481-b70f-8b3ab1fc4f2c"],
+Cell[CellGroupData[{
+Cell[31259, 767, 1092, 27, 115, "Input",ExpressionUUID->"df43f43c-f3df-4d31-8f47-e316129e404e"],
+Cell[CellGroupData[{
+Cell[32376, 798, 410, 7, 24, "Print",ExpressionUUID->"13bb3e84-1aad-451c-9470-217fab9f697f"],
+Cell[32789, 807, 412, 7, 24, "Print",ExpressionUUID->"c6fece5c-a585-4c90-ab33-806fa3705b71"]
+}, Open ]],
+Cell[33216, 817, 156, 2, 34, "Output",ExpressionUUID->"829f296d-4387-479f-92bc-7a626dfe607c"]
+}, Open ]],
+Cell[33387, 822, 427, 9, 52, "Input",ExpressionUUID->"0d3ce3b6-3c94-4932-a9ed-194cea17f2b9"],
+Cell[33817, 833, 1058, 24, 56, "Input",ExpressionUUID->"5a89f228-5332-4b40-9dd2-0e3e845f3970"],
+Cell[34878, 859, 290, 7, 30, "Input",ExpressionUUID->"3a874326-a732-49f9-bf3f-018de4fbf690"],
+Cell[35171, 868, 243, 6, 52, "Input",ExpressionUUID->"37adef6f-081e-487c-bd44-ab449560d571"],
+Cell[CellGroupData[{
+Cell[35439, 878, 998, 26, 115, "Input",ExpressionUUID->"f3c0843b-be94-4b77-89a7-a517bd2df868"],
+Cell[CellGroupData[{
+Cell[36462, 908, 247, 5, 24, "Print",ExpressionUUID->"e2ec887b-8f74-4c58-b508-8180d0a5ab39"],
+Cell[36712, 915, 247, 5, 24, "Print",ExpressionUUID->"37e2fbaf-ebf4-468b-9e07-64d66403941b"],
+Cell[36962, 922, 249, 5, 24, "Print",ExpressionUUID->"2e78dfd3-252a-4510-977f-b4f27ff8aa4b"],
+Cell[37214, 929, 247, 5, 24, "Print",ExpressionUUID->"a0e44cf6-a61f-449f-8a34-2c8ce9d266f3"],
+Cell[37464, 936, 247, 5, 24, "Print",ExpressionUUID->"a931e414-5259-4e72-acd7-dcee07599a82"],
+Cell[37714, 943, 247, 5, 24, "Print",ExpressionUUID->"5594c2a5-c197-4faf-9ffb-e7ba76cbc538"],
+Cell[37964, 950, 247, 5, 24, "Print",ExpressionUUID->"8ecef3ea-5555-4307-bcb5-45617481fea4"],
+Cell[38214, 957, 249, 5, 24, "Print",ExpressionUUID->"84060125-ad1a-4df3-8ce7-b2dbb52a255e"],
+Cell[38466, 964, 247, 5, 24, "Print",ExpressionUUID->"ba89847a-a4aa-4bc8-bbdf-fc4fe94626a9"],
+Cell[38716, 971, 247, 5, 24, "Print",ExpressionUUID->"4ad9a298-9033-4f95-ba31-e459488b2078"],
+Cell[38966, 978, 249, 5, 24, "Print",ExpressionUUID->"0f51e120-6ffe-40ed-90a9-16ffc4b8cd7b"],
+Cell[39218, 985, 249, 5, 24, "Print",ExpressionUUID->"55f10a7d-2dd2-42de-9c51-a8b42913981b"],
+Cell[39470, 992, 247, 5, 24, "Print",ExpressionUUID->"4f770da7-96cd-4cb8-a4d4-ac8321d712cd"],
+Cell[39720, 999, 247, 5, 24, "Print",ExpressionUUID->"649189dd-7c36-4840-a8f2-e90ccecbefc1"],
+Cell[39970, 1006, 247, 5, 24, "Print",ExpressionUUID->"69c8ff97-a48c-433d-a1af-293c970ff456"],
+Cell[40220, 1013, 247, 5, 24, "Print",ExpressionUUID->"e5097cc9-3fd7-4356-82cc-935a8fd99f37"],
+Cell[40470, 1020, 249, 5, 24, "Print",ExpressionUUID->"2a4fa068-31d2-42b2-8e27-9cd47a215300"],
+Cell[40722, 1027, 247, 5, 24, "Print",ExpressionUUID->"d4490842-541b-4159-b08b-37254e2f02ee"],
+Cell[40972, 1034, 247, 5, 24, "Print",ExpressionUUID->"0ae6d1ae-d897-40b7-83ac-03676d9405d7"],
+Cell[41222, 1041, 247, 5, 24, "Print",ExpressionUUID->"dd1f2688-2c0e-4ed6-aa9d-d7b634519be6"],
+Cell[41472, 1048, 246, 5, 24, "Print",ExpressionUUID->"28b3e938-3807-4e3b-9426-e708dcec15b0"],
+Cell[41721, 1055, 247, 5, 24, "Print",ExpressionUUID->"b68ca497-f2d7-495a-b577-5f5f7cc0b776"],
+Cell[41971, 1062, 247, 5, 24, "Print",ExpressionUUID->"d67f7e5b-0500-4072-a004-7f5c73342e3a"],
+Cell[42221, 1069, 247, 5, 24, "Print",ExpressionUUID->"ce08a793-ce51-4874-b4c7-0d99e3e47784"],
+Cell[42471, 1076, 247, 5, 24, "Print",ExpressionUUID->"fbbc2328-d686-4169-8a45-f2f916e0d9d2"],
+Cell[42721, 1083, 249, 5, 24, "Print",ExpressionUUID->"1cb44eb4-a5e3-4f09-a2dc-7ed04f4bcf1f"],
+Cell[42973, 1090, 247, 5, 24, "Print",ExpressionUUID->"622b5b19-decc-4b43-aecb-2a18b830f72c"],
+Cell[43223, 1097, 249, 5, 24, "Print",ExpressionUUID->"f6dc26ef-5813-4857-bfe4-c26b87bc1f7b"],
+Cell[43475, 1104, 247, 5, 24, "Print",ExpressionUUID->"2d3735df-91e7-4795-8dfd-6ed011d79107"],
+Cell[43725, 1111, 249, 5, 24, "Print",ExpressionUUID->"50fe601d-1b2b-4d2e-807b-1d249afe001e"],
+Cell[43977, 1118, 249, 5, 24, "Print",ExpressionUUID->"2fdfacbd-80ef-4c9a-b71f-e2cc0d9afe5e"],
+Cell[44229, 1125, 247, 5, 24, "Print",ExpressionUUID->"da85be8b-7972-4185-b906-d61dc785a9fd"],
+Cell[44479, 1132, 249, 5, 24, "Print",ExpressionUUID->"1c79d656-868a-4326-8d0a-2659691bbe1c"],
+Cell[44731, 1139, 247, 5, 24, "Print",ExpressionUUID->"efa41b92-f275-451a-ac92-19e0f0f8ac9d"],
+Cell[44981, 1146, 249, 5, 24, "Print",ExpressionUUID->"37e28f01-8fd3-4b48-b1b2-21df0a6ba950"],
+Cell[45233, 1153, 247, 5, 24, "Print",ExpressionUUID->"e844650c-6ee0-4b56-bc47-625127c32e2b"],
+Cell[45483, 1160, 249, 5, 24, "Print",ExpressionUUID->"29f611a5-3fe6-49ea-ba52-f894c5b962a5"],
+Cell[45735, 1167, 247, 5, 24, "Print",ExpressionUUID->"0d1b53d7-40d6-416f-87a6-b7b7a755e497"],
+Cell[45985, 1174, 249, 5, 24, "Print",ExpressionUUID->"dcd3c150-23ea-4f93-8005-bdd7678c1c03"],
+Cell[46237, 1181, 247, 5, 24, "Print",ExpressionUUID->"fe002903-a338-4ec6-ab39-693bb8f32eff"],
+Cell[46487, 1188, 249, 5, 24, "Print",ExpressionUUID->"34a03c80-9c4e-4fcb-b5ff-f3ff0cb1f223"],
+Cell[46739, 1195, 247, 5, 24, "Print",ExpressionUUID->"6cb0347b-630c-40c9-be5c-e11d214769dc"],
+Cell[46989, 1202, 249, 5, 24, "Print",ExpressionUUID->"0815e5f7-0b7c-4ceb-83e7-8cfc79826245"],
+Cell[47241, 1209, 247, 5, 24, "Print",ExpressionUUID->"92f96f11-b3a8-42e5-98e6-6fee3c21c719"],
+Cell[47491, 1216, 247, 5, 24, "Print",ExpressionUUID->"f5dc0de3-7380-4b70-b0d3-54def93aedd4"],
+Cell[47741, 1223, 249, 5, 24, "Print",ExpressionUUID->"a1701a3b-5ef3-47a9-95a2-d8e512233777"],
+Cell[47993, 1230, 247, 5, 24, "Print",ExpressionUUID->"4097feba-7377-4752-bb38-a0921cc43c71"],
+Cell[48243, 1237, 247, 5, 24, "Print",ExpressionUUID->"dd3dbaf1-61f0-453b-9b9a-36874206af99"],
+Cell[48493, 1244, 249, 5, 24, "Print",ExpressionUUID->"40b1ffb0-1c9e-42ee-9160-2930f36cdfaa"],
+Cell[48745, 1251, 245, 5, 24, "Print",ExpressionUUID->"191f384d-858c-4d19-92a6-40c39817d766"],
+Cell[48993, 1258, 246, 5, 24, "Print",ExpressionUUID->"0ad5044a-36b0-4d57-a03e-5b3764fa61c2"],
+Cell[49242, 1265, 247, 5, 24, "Print",ExpressionUUID->"777e0a58-0441-45aa-bb77-379de521b4ea"],
+Cell[49492, 1272, 247, 5, 24, "Print",ExpressionUUID->"26958225-f0de-4b0d-8418-1d0e741744db"],
+Cell[49742, 1279, 247, 5, 24, "Print",ExpressionUUID->"aa153189-1719-4ec3-a6c4-faeae6eb825e"],
+Cell[49992, 1286, 247, 5, 24, "Print",ExpressionUUID->"ad84b383-b8b6-4501-8354-e87c74b4fe47"],
+Cell[50242, 1293, 247, 5, 24, "Print",ExpressionUUID->"fb83c3a6-a8b1-4afc-8465-6456a8260a4f"],
+Cell[50492, 1300, 246, 5, 24, "Print",ExpressionUUID->"cd5fc969-87ec-41e9-8094-20cb832c0cf2"],
+Cell[50741, 1307, 247, 5, 24, "Print",ExpressionUUID->"8f96c2e7-a606-44fd-9bd3-787dbc3507ca"],
+Cell[50991, 1314, 247, 5, 24, "Print",ExpressionUUID->"1cb89dfe-425a-4c52-9b55-b4a6014c9852"],
+Cell[51241, 1321, 247, 5, 24, "Print",ExpressionUUID->"ef7f8635-cadc-4f02-9e3b-547e00252d2e"],
+Cell[51491, 1328, 247, 5, 24, "Print",ExpressionUUID->"4f79ee0d-259f-4d53-809b-53a89f702a3d"],
+Cell[51741, 1335, 247, 5, 24, "Print",ExpressionUUID->"886f8afa-5606-4059-8b26-d7d6af479013"],
+Cell[51991, 1342, 246, 5, 24, "Print",ExpressionUUID->"cd7e7c7e-efdb-40bf-ae88-e79e89aee24f"],
+Cell[52240, 1349, 247, 5, 24, "Print",ExpressionUUID->"f3dba259-3e90-4a75-828b-055cb49c87c8"],
+Cell[52490, 1356, 249, 5, 24, "Print",ExpressionUUID->"37b1dcf0-6b49-4eb5-b721-89fc56a828df"],
+Cell[52742, 1363, 247, 5, 24, "Print",ExpressionUUID->"5f7c8d38-0599-40f0-9972-0a6d5997ecbf"],
+Cell[52992, 1370, 247, 5, 24, "Print",ExpressionUUID->"69c00823-96b0-4daa-9990-36f08fb6ce56"],
+Cell[53242, 1377, 247, 5, 24, "Print",ExpressionUUID->"fb97acd4-1d96-4a85-8bc6-3305a839a3da"],
+Cell[53492, 1384, 247, 5, 24, "Print",ExpressionUUID->"43bad5b4-c421-419d-9915-1b67c66f1036"],
+Cell[53742, 1391, 247, 5, 24, "Print",ExpressionUUID->"f5846949-e47a-4e77-914f-0a8f50e06332"],
+Cell[53992, 1398, 247, 5, 24, "Print",ExpressionUUID->"6a5ef075-fa3d-4ad6-b501-a5cb532fd6f5"],
+Cell[54242, 1405, 247, 5, 24, "Print",ExpressionUUID->"ee5772c0-100c-4ff4-83b0-096fcfc8e2a6"],
+Cell[54492, 1412, 249, 5, 24, "Print",ExpressionUUID->"fec2f95e-20ad-473c-80c7-bfbc2b46c85f"]
+}, Closed]]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[54790, 1423, 414, 10, 52, "Input",ExpressionUUID->"083fb79c-daba-4277-b94e-78bed80412be"],
+Cell[55207, 1435, 709, 19, 46, "Output",ExpressionUUID->"21437e94-a2d0-4030-9577-1fb730a2c01b"]
+}, Open ]],
+Cell[55931, 1457, 910, 22, 56, "Input",ExpressionUUID->"c9749ffe-5ab8-4c9a-aef7-8af3843d725b"],
+Cell[56844, 1481, 290, 7, 30, "Input",ExpressionUUID->"2d6ff57e-8bdd-4f5e-9772-e77bcbd1d8d0"],
+Cell[57137, 1490, 147, 3, 52, "Input",ExpressionUUID->"2239b8d8-532e-4c08-ac3b-e377a166b460"],
+Cell[57287, 1495, 379, 8, 30, "Input",ExpressionUUID->"e40759ab-7c04-4bf0-a25e-f80786106946"],
+Cell[57669, 1505, 379, 8, 52, "Input",ExpressionUUID->"007158c3-a206-4cab-88ec-886b70f30fed"],
+Cell[CellGroupData[{
+Cell[58073, 1517, 268, 5, 30, "Input",ExpressionUUID->"743fd8ff-17f3-49f2-85d6-506c6d73e5ad"],
+Cell[58344, 1524, 12097, 315, 213, "Output",ExpressionUUID->"0fce6bb0-45fe-4e6c-a361-d7b5261cb38e"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[70478, 1844, 260, 4, 30, "Input",ExpressionUUID->"f774e49f-9f49-4e9e-8986-5d0680aa1203"],
+Cell[70741, 1850, 173, 2, 34, "Output",ExpressionUUID->"1a69893c-2615-4d54-91e8-335f2abb5de6"]
+}, Open ]],
+Cell[70929, 1855, 278, 5, 136, "Input",ExpressionUUID->"9a42fe37-6411-44bf-809a-1046a3483503"],
+Cell[71210, 1862, 294, 6, 30, "Input",ExpressionUUID->"9e2a44fe-0bb9-4f67-9e8b-da5c10ecf6b1"],
+Cell[CellGroupData[{
+Cell[71529, 1872, 182, 2, 30, "Input",ExpressionUUID->"f396c3bc-ea1b-44d3-a6cc-f7fecc0fffe5"],
+Cell[71714, 1876, 12116, 317, 213, "Output",ExpressionUUID->"1d1b26d3-3d5a-4f24-a113-21f43e2027cf"]
+}, Open ]],
+Cell[83845, 2196, 812, 19, 94, "Input",ExpressionUUID->"0484a78b-7482-4457-ac3e-5762b8c80c69"],
+Cell[CellGroupData[{
+Cell[84682, 2219, 247, 4, 30, "Input",ExpressionUUID->"6f58dd70-ec76-4b2e-8d7d-ae9f5adae4ca"],
+Cell[84932, 2225, 11414, 300, 191, "Output",ExpressionUUID->"b4f39a2e-5da3-4756-9d30-b57a024860f7"]
+}, Open ]],
+Cell[96361, 2528, 414, 9, 30, "Input",ExpressionUUID->"6dc8539a-b6fb-45ed-bf01-82aab57aef98"],
+Cell[CellGroupData[{
+Cell[96800, 2541, 236, 4, 30, "Input",ExpressionUUID->"cb0ca33d-b1f5-4703-8d8e-8c263a31064a"],
+Cell[97039, 2547, 11410, 300, 196, "Output",ExpressionUUID->"1d5fa8ad-833f-46d5-a1dc-a4179db033a8"]
+}, Open ]],
+Cell[108464, 2850, 417, 9, 30, "Input",ExpressionUUID->"5eff98d5-542a-4fb2-8a57-8b5bb386d93b"],
+Cell[CellGroupData[{
+Cell[108906, 2863, 230, 4, 30, "Input",ExpressionUUID->"6b8a882a-c4d7-48c9-bd9a-89d690e1775f"],
+Cell[109139, 2869, 11431, 302, 194, "Output",ExpressionUUID->"0dd69f7f-556b-4cf0-903b-9a63338f9b78"]
+}, Open ]],
+Cell[120585, 3174, 413, 9, 30, "Input",ExpressionUUID->"786a397e-8276-4b59-936c-1058b86fa2b4"],
+Cell[CellGroupData[{
+Cell[121023, 3187, 232, 4, 30, "Input",ExpressionUUID->"cac28fd3-e795-47f1-a77e-e5a2fe196f33"],
+Cell[121258, 3193, 11631, 306, 199, "Output",ExpressionUUID->"fdf26c39-191c-4b8f-8ed6-4f24a3f9beeb"]
+}, Open ]],
+Cell[132904, 3502, 462, 11, 52, "Input",ExpressionUUID->"c7feecf3-f47a-423b-924d-e06efe08d9d2"],
+Cell[133369, 3515, 419, 9, 157, "Input",ExpressionUUID->"7e7b9f75-0ed1-4382-a7dd-99907c1473ac"],
+Cell[CellGroupData[{
+Cell[133813, 3528, 248, 4, 30, "Input",ExpressionUUID->"ae98646f-6aec-43fc-bc4c-76b34b9d8371"],
+Cell[134064, 3534, 2181, 62, 146, "Output",ExpressionUUID->"b03d30ad-4939-46cf-b5fe-8b765a9784a2"]
+}, Open ]],
+Cell[136260, 3599, 1054, 29, 115, "Input",ExpressionUUID->"24b1d6d5-8138-410c-bad0-4688d4069032"],
+Cell[137317, 3630, 396, 9, 136, "Input",ExpressionUUID->"1f278cce-b737-471d-abb8-571bd986d464"],
+Cell[137716, 3641, 265, 5, 30, "Input",ExpressionUUID->"9a2e8cfd-31b0-4513-b860-e5717141a96f"],
+Cell[137984, 3648, 851, 23, 73, "Input",ExpressionUUID->"f2581317-15ac-431d-858d-1506de0ee6ea"],
+Cell[138838, 3673, 239, 5, 30, "Input",ExpressionUUID->"935c66bf-fd6a-4022-88ef-839267449906"],
+Cell[139080, 3680, 255, 5, 115, "Input",ExpressionUUID->"e4eda86f-c0c1-4ed1-b09c-a197bbc299c9"],
+Cell[139338, 3687, 1202, 32, 136, "Input",ExpressionUUID->"e7549059-0b03-41c9-afd1-97986dde3359"],
+Cell[140543, 3721, 154, 3, 30, "Input",ExpressionUUID->"75c75df4-ee72-49af-9630-1cf0eef74f43"],
+Cell[140700, 3726, 128, 3, 30, "Input",ExpressionUUID->"a4013e44-a682-4c70-a84f-f4695f7dd230"],
+Cell[140831, 3731, 238, 5, 30, "Input",ExpressionUUID->"73dfc6d7-5c31-463e-8864-6b5bef17b11d"],
+Cell[CellGroupData[{
+Cell[141094, 3740, 524, 14, 30, "Input",ExpressionUUID->"b4100299-10f3-4c3c-90b5-db96319fb7d9"],
+Cell[141621, 3756, 3541, 105, 133, "Output",ExpressionUUID->"227ac9fd-122f-4bdd-8ce6-0421fc3101b9"]
+}, Open ]],
+Cell[145177, 3864, 636, 18, 52, "Input",ExpressionUUID->"d027658a-37f9-489d-a307-4d535ae073b9"],
+Cell[CellGroupData[{
+Cell[145838, 3886, 203, 3, 30, "Input",ExpressionUUID->"55e4d6af-838f-45bf-ab25-da03c1c1d848"],
+Cell[146044, 3891, 3741, 113, 161, "Output",ExpressionUUID->"f7adf7fb-3d44-404a-b9d8-8367ef825cc7"]
+}, Open ]],
+Cell[149800, 4007, 328, 6, 115, "Input",ExpressionUUID->"a9b9ca57-f825-4517-8b39-8ebebaffad8a"],
+Cell[150131, 4015, 1735, 50, 136, "Input",ExpressionUUID->"f261cfc3-9a94-4830-9195-aa48c3328d0f"],
+Cell[151869, 4067, 1023, 26, 178, "Input",ExpressionUUID->"5fb9542c-66c2-4b59-b6c0-3d1e3db1842f"],
+Cell[152895, 4095, 195, 4, 30, "Input",ExpressionUUID->"ce77b5bd-ebce-4c42-9263-53392240007e"],
+Cell[153093, 4101, 1358, 37, 115, "Input",ExpressionUUID->"9997d1a8-9d83-430a-8554-6cfc2a974c27"],
+Cell[154454, 4140, 1818, 48, 178, "Input",ExpressionUUID->"3e8bf30c-17cd-43d9-b2c2-32aaac3fabf4"],
+Cell[156275, 4190, 906, 22, 115, "Input",ExpressionUUID->"0faeac76-b8a2-41ff-a322-8a7cc20f5cdc"],
+Cell[CellGroupData[{
+Cell[157206, 4216, 547, 11, 52, "Input",ExpressionUUID->"0aeaadd3-5332-4530-a274-2d257367f236"],
+Cell[CellGroupData[{
+Cell[157778, 4231, 196, 4, 24, "Print",ExpressionUUID->"941d2971-0756-46af-bbfa-35b438dd0e63"],
+Cell[157977, 4237, 198, 4, 24, "Print",ExpressionUUID->"7f9fc3c9-6ddc-47d5-af72-107027ebb276"],
+Cell[158178, 4243, 196, 4, 24, "Print",ExpressionUUID->"da3f0120-fdef-4857-aa25-2ee29cd3ae1a"],
+Cell[158377, 4249, 198, 4, 24, "Print",ExpressionUUID->"b6c871c9-430f-4950-8ffa-bdb5d1f09ffe"],
+Cell[158578, 4255, 196, 4, 24, "Print",ExpressionUUID->"08b8650b-700a-4a81-98cd-762915822ac6"],
+Cell[158777, 4261, 196, 4, 24, "Print",ExpressionUUID->"dc323011-3d7c-4c71-98f9-fc651ab59bcd"],
+Cell[158976, 4267, 196, 4, 24, "Print",ExpressionUUID->"dcbc9173-996e-4615-8934-be1437da9dbc"],
+Cell[159175, 4273, 196, 4, 24, "Print",ExpressionUUID->"5235f72f-1e09-460f-a972-86c8776de7bf"],
+Cell[159374, 4279, 196, 4, 24, "Print",ExpressionUUID->"51d0dc87-3144-4105-a8ae-a650d049a319"],
+Cell[159573, 4285, 197, 4, 24, "Print",ExpressionUUID->"61f11d61-f008-44dc-96d0-db1dad10327b"],
+Cell[159773, 4291, 199, 4, 24, "Print",ExpressionUUID->"f3db9187-5fb7-4179-9d5d-fee11f151b8a"],
+Cell[159975, 4297, 197, 4, 24, "Print",ExpressionUUID->"55143390-2218-4242-8577-41b5b68bf26f"],
+Cell[160175, 4303, 197, 4, 24, "Print",ExpressionUUID->"de5e700a-5013-445e-b472-25d383ca5cf3"],
+Cell[160375, 4309, 197, 4, 24, "Print",ExpressionUUID->"04316d54-f297-424b-9b49-acfd45d21630"],
+Cell[160575, 4315, 199, 4, 24, "Print",ExpressionUUID->"017b3ad1-2b25-45a4-8b9d-111686161236"],
+Cell[160777, 4321, 199, 4, 24, "Print",ExpressionUUID->"cf381b0c-ac88-40ab-b951-874fcfdfa6c6"],
+Cell[160979, 4327, 197, 4, 24, "Print",ExpressionUUID->"67e161ed-8390-46fa-a181-f56c98936077"],
+Cell[161179, 4333, 197, 4, 24, "Print",ExpressionUUID->"12eddb76-c821-45d5-9119-d5d357f2d4eb"],
+Cell[161379, 4339, 197, 4, 24, "Print",ExpressionUUID->"f42cca31-6f52-49bc-b356-94d57c78fd27"],
+Cell[161579, 4345, 197, 4, 24, "Print",ExpressionUUID->"812113fc-a308-46fd-b058-9e34214fc722"],
+Cell[161779, 4351, 197, 4, 24, "Print",ExpressionUUID->"5f1deb06-8268-41a5-84bd-e5a8ada699a5"],
+Cell[161979, 4357, 199, 4, 24, "Print",ExpressionUUID->"28c127e4-f366-4435-9db7-8b114a82b320"],
+Cell[162181, 4363, 199, 4, 24, "Print",ExpressionUUID->"db1f8f22-c844-4e1e-892c-73ca3a41eaee"],
+Cell[162383, 4369, 197, 4, 24, "Print",ExpressionUUID->"ae692077-c31d-43f0-a099-c52e179f8dea"],
+Cell[162583, 4375, 196, 4, 24, "Print",ExpressionUUID->"8f0af9a8-1bc7-4b92-a518-3b7fb75be3ae"],
+Cell[162782, 4381, 197, 4, 24, "Print",ExpressionUUID->"60b61b67-6c61-4599-a20d-463c308eb270"],
+Cell[162982, 4387, 197, 4, 24, "Print",ExpressionUUID->"60c27d5d-d770-45b4-8b6e-611a3c03ef79"],
+Cell[163182, 4393, 197, 4, 24, "Print",ExpressionUUID->"e5c01ae9-55fc-47f8-9c3d-6f54b4b00756"],
+Cell[163382, 4399, 196, 4, 24, "Print",ExpressionUUID->"7f11c8de-f7aa-4313-ab85-f0bc8404662d"],
+Cell[163581, 4405, 199, 4, 24, "Print",ExpressionUUID->"9e154613-6e9c-4d11-8ddd-6170705528ab"],
+Cell[163783, 4411, 197, 4, 24, "Print",ExpressionUUID->"2f8e02d9-a5b4-4bd9-b9d9-aec02153dd7c"],
+Cell[163983, 4417, 199, 4, 24, "Print",ExpressionUUID->"650def7c-a65f-44fb-811b-1fa0b5a45d15"],
+Cell[164185, 4423, 199, 4, 24, "Print",ExpressionUUID->"6474532b-9599-4489-88db-58d38314ab6f"],
+Cell[164387, 4429, 197, 4, 24, "Print",ExpressionUUID->"226a40c4-f169-42d2-8ab6-1f67a2f873ea"],
+Cell[164587, 4435, 196, 4, 24, "Print",ExpressionUUID->"a1944f0f-52a8-49d8-b9c3-20fec2f3235a"],
+Cell[164786, 4441, 197, 4, 24, "Print",ExpressionUUID->"3b4b9b10-ab7e-4de6-ab0f-e0018abf925b"],
+Cell[164986, 4447, 196, 4, 24, "Print",ExpressionUUID->"6c480e69-9121-408a-8dec-f908c61e8d42"],
+Cell[165185, 4453, 199, 4, 24, "Print",ExpressionUUID->"cba40a3e-274e-4ca6-acca-4f9780f8640b"],
+Cell[165387, 4459, 197, 4, 24, "Print",ExpressionUUID->"e62616bb-5c74-4eeb-afa2-bb439d81b80e"],
+Cell[165587, 4465, 197, 4, 24, "Print",ExpressionUUID->"52e54f32-ac58-4414-93fa-68fcf6f14698"],
+Cell[165787, 4471, 197, 4, 24, "Print",ExpressionUUID->"50d0b363-2b99-4f39-bfc0-29a59ae13c83"],
+Cell[165987, 4477, 197, 4, 24, "Print",ExpressionUUID->"5dca03fa-6242-4056-b5c8-360525f873d4"],
+Cell[166187, 4483, 197, 4, 24, "Print",ExpressionUUID->"91a05c83-f424-4d73-8df9-fd9365c15c65"],
+Cell[166387, 4489, 197, 4, 24, "Print",ExpressionUUID->"e35ff97f-1b31-4eec-84d3-b936608c353c"],
+Cell[166587, 4495, 197, 4, 24, "Print",ExpressionUUID->"45f0eca5-0ad3-474d-8922-cc6c393a259f"]
+}, Open ]],
+Cell[166799, 4502, 196, 3, 34, "Output",ExpressionUUID->"cfcdfb24-b305-466a-a1bb-a332ab352a9e"]
+}, Closed]],
+Cell[167010, 4508, 371, 8, 26, "Input",ExpressionUUID->"09576c11-deed-4e65-b168-19d328941f7e"],
+Cell[167384, 4518, 1052, 28, 115, "Input",ExpressionUUID->"e9cb917d-6bce-4b94-a047-15b919e9e4cc"],
+Cell[168439, 4548, 883, 22, 115, "Input",ExpressionUUID->"58da36ab-d8d7-464f-a677-c4ffb3b43015"],
+Cell[CellGroupData[{
+Cell[169347, 4574, 441, 10, 30, "Input",ExpressionUUID->"93d22a91-7738-43f2-ae38-e21755ca22f1"],
+Cell[169791, 4586, 515, 11, 42, "Message",ExpressionUUID->"dc04a919-7e52-45e2-bb44-a344b5d1d308"],
+Cell[170309, 4599, 513, 11, 42, "Message",ExpressionUUID->"99a74ed9-9abc-451d-8242-fd4078fd5891"],
+Cell[170825, 4612, 515, 11, 42, "Message",ExpressionUUID->"1070ad89-c66d-4906-aa54-fd4ac95964d8"],
+Cell[171343, 4625, 461, 10, 24, "Message",ExpressionUUID->"9dbf4032-8c2f-4bba-9001-aa2649499b6f"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[171841, 4640, 154, 3, 30, "Input",ExpressionUUID->"6e5f5a2d-f8d8-41cc-b7f7-193907c772e2"],
+Cell[171998, 4645, 4419372, 95030, 90964, "Output",ExpressionUUID->"6849d88e-ad0f-49c4-99da-875ddf3df840"]
+}, Closed]],
+Cell[4591385, 99678, 152, 3, 26, "Input",ExpressionUUID->"3bccd808-2d0d-4aed-ad5c-f98dce1bb2fa"],
+Cell[4591540, 99683, 151, 3, 30, "Input",ExpressionUUID->"9214d531-c1c4-4f0b-8067-62d509d3780e"],
+Cell[4591694, 99688, 152, 3, 30, "Input",ExpressionUUID->"5d134bbf-d270-4d46-9aad-c35a20b3af10"],
+Cell[4591849, 99693, 1248, 34, 115, "Input",ExpressionUUID->"c9706e32-aa64-4bea-be5e-fca139f74b78"],
+Cell[4593100, 99729, 1047, 24, 94, "Input",ExpressionUUID->"2098a55c-4e04-413e-b48c-2e3e1420aeba"],
+Cell[4594150, 99755, 716, 17, 73, "Input",ExpressionUUID->"f11165e8-30f4-4621-91cb-e78cc1116c62"],
+Cell[4594869, 99774, 302, 5, 30, "Input",ExpressionUUID->"881beb7c-e557-4703-a5ed-8b7345c6403b"],
+Cell[CellGroupData[{
+Cell[4595196, 99783, 240, 4, 30, "Input",ExpressionUUID->"86953094-992b-4ece-81d3-0f54f8c99910"],
+Cell[CellGroupData[{
+Cell[4595461, 99791, 197, 4, 24, "Print",ExpressionUUID->"8b88be0a-a13e-4a7b-8295-c1008ad658d6"],
+Cell[4595661, 99797, 198, 4, 24, "Print",ExpressionUUID->"f854acc1-f24a-43ce-9107-892da3741105"],
+Cell[4595862, 99803, 198, 4, 24, "Print",ExpressionUUID->"0ebf2041-29ad-490d-ae2c-fb00ea60e896"],
+Cell[4596063, 99809, 198, 4, 24, "Print",ExpressionUUID->"ce7c7420-29bb-4bc7-9fe1-c52d92b3c17c"],
+Cell[4596264, 99815, 198, 4, 24, "Print",ExpressionUUID->"bdb7f0f5-ae0e-47e3-bde4-add2b2e9172d"],
+Cell[4596465, 99821, 198, 4, 24, "Print",ExpressionUUID->"6ccc5234-8d31-4f80-b860-fb9bc1ead01e"],
+Cell[4596666, 99827, 198, 4, 24, "Print",ExpressionUUID->"9f6f5a15-4625-4559-aeb6-4e62d60ea660"],
+Cell[4596867, 99833, 200, 4, 24, "Print",ExpressionUUID->"cc753901-6a7d-4228-ac53-35d451b86d77"],
+Cell[4597070, 99839, 198, 4, 24, "Print",ExpressionUUID->"8fe1d30b-85ec-47bd-8e46-174bcc6be6cf"],
+Cell[4597271, 99845, 199, 4, 24, "Print",ExpressionUUID->"cd6b11e5-086b-4a28-ba23-c88ce09cbddb"]
+}, Open ]],
+Cell[4597485, 99852, 196, 3, 34, "Output",ExpressionUUID->"f9eb79c9-79ab-4972-ac5d-9bf4d7c5706c"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4597718, 99860, 241, 4, 26, "Input",ExpressionUUID->"f96bfd50-3c93-487b-b72c-0efa966db052"],
+Cell[CellGroupData[{
+Cell[4597984, 99868, 197, 4, 24, "Print",ExpressionUUID->"0df55f20-b51c-4417-8687-560b75680ad9"],
+Cell[4598184, 99874, 199, 4, 24, "Print",ExpressionUUID->"65afac5f-ac1b-405d-95ca-d88dcc034907"],
+Cell[4598386, 99880, 199, 4, 24, "Print",ExpressionUUID->"155d77b5-d5ca-47b5-bba8-036aff1d2443"],
+Cell[4598588, 99886, 199, 4, 24, "Print",ExpressionUUID->"6402840f-e54b-49d2-8ce8-0175340b2083"],
+Cell[4598790, 99892, 199, 4, 24, "Print",ExpressionUUID->"736736de-4f33-4375-9ad5-d9f98f5dba87"],
+Cell[4598992, 99898, 197, 4, 24, "Print",ExpressionUUID->"5d2d9825-5632-4457-8211-7dd6cee750a8"],
+Cell[4599192, 99904, 197, 4, 24, "Print",ExpressionUUID->"23906453-43f1-4403-92b6-e9fb94c0ae50"],
+Cell[4599392, 99910, 197, 4, 24, "Print",ExpressionUUID->"2ba2eb99-fc54-459f-85c0-ed99d7ad07c9"],
+Cell[4599592, 99916, 197, 4, 24, "Print",ExpressionUUID->"94070629-691b-4d0a-9eb7-69b91078a11e"],
+Cell[4599792, 99922, 197, 4, 24, "Print",ExpressionUUID->"3812bf93-11c7-45dc-bd0e-7ed9238191ce"]
+}, Open ]],
+Cell[4600004, 99929, 196, 3, 34, "Output",ExpressionUUID->"3f41a929-7beb-4259-8ecb-4fc1d8a69374"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4600237, 99937, 243, 4, 26, "Input",ExpressionUUID->"fe1a97a8-532e-4e7a-8a88-f565caae5f97"],
+Cell[CellGroupData[{
+Cell[4600505, 99945, 201, 4, 24, "Print",ExpressionUUID->"203826e8-d100-4a48-aa61-b8cae880ddf2"],
+Cell[4600709, 99951, 199, 4, 24, "Print",ExpressionUUID->"9a8a2d64-a921-4ebe-b6c4-e90419eee1c2"],
+Cell[4600911, 99957, 199, 4, 24, "Print",ExpressionUUID->"ceff1cb8-2c39-4c0f-a43a-efcbdbef0fe2"],
+Cell[4601113, 99963, 201, 4, 24, "Print",ExpressionUUID->"89a661a3-5c0c-4326-a393-6e4972db4a6b"],
+Cell[4601317, 99969, 201, 4, 24, "Print",ExpressionUUID->"6aa6f90c-6c91-4f86-8968-1103cba7975b"],
+Cell[4601521, 99975, 199, 4, 24, "Print",ExpressionUUID->"0dcb36c1-0668-4b8a-bc01-4945a598c78a"],
+Cell[4601723, 99981, 199, 4, 24, "Print",ExpressionUUID->"0fcfcd70-8d7b-435d-a163-acb028e6e16e"],
+Cell[4601925, 99987, 199, 4, 24, "Print",ExpressionUUID->"3b7724cb-54a4-4dde-8ea0-50e5610b792e"],
+Cell[4602127, 99993, 199, 4, 24, "Print",ExpressionUUID->"b613c9c7-96f4-4a6c-8f08-8e6df52762df"],
+Cell[4602329, 99999, 199, 4, 24, "Print",ExpressionUUID->"a6fd0189-8e91-469a-9897-389a4893d7b0"]
+}, Open ]],
+Cell[4602543, 100006, 196, 3, 34, "Output",ExpressionUUID->"4a8fef41-31e5-42c1-8bdc-68e9f7afbd6a"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4602776, 100014, 242, 4, 26, "Input",ExpressionUUID->"2aecbe65-4b44-4dfa-93ef-65fd39540c9b"],
+Cell[CellGroupData[{
+Cell[4603043, 100022, 197, 4, 24, "Print",ExpressionUUID->"2fca990b-8284-4e3f-8a3b-7f56db89acc5"],
+Cell[4603243, 100028, 197, 4, 24, "Print",ExpressionUUID->"3177b850-296d-49fe-8867-d3473a1b0c35"],
+Cell[4603443, 100034, 197, 4, 24, "Print",ExpressionUUID->"c0b4e928-89e9-4d85-8e51-5cbdf9ce41aa"],
+Cell[4603643, 100040, 197, 4, 24, "Print",ExpressionUUID->"a373700f-9836-44d5-8a5f-930119678171"],
+Cell[4603843, 100046, 197, 4, 24, "Print",ExpressionUUID->"ca822f7e-70c9-46a4-a25f-582acb77abcb"],
+Cell[4604043, 100052, 197, 4, 24, "Print",ExpressionUUID->"96e22b30-8c73-4518-8d23-873121d8fc48"],
+Cell[4604243, 100058, 197, 4, 24, "Print",ExpressionUUID->"83708b79-d67b-4c05-93e9-38073aa7fe05"],
+Cell[4604443, 100064, 197, 4, 24, "Print",ExpressionUUID->"78e88359-b700-4328-bea6-a2b0d14a7cac"],
+Cell[4604643, 100070, 197, 4, 24, "Print",ExpressionUUID->"704157f3-bfb2-4f43-b5f0-c5bfbc560aab"],
+Cell[4604843, 100076, 197, 4, 24, "Print",ExpressionUUID->"7565254f-9a77-48dc-9444-33b886723862"]
+}, Open ]],
+Cell[4605055, 100083, 200, 3, 34, "Output",ExpressionUUID->"2e1c38af-7450-4ecc-a05c-257dcdba5451"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4605292, 100091, 241, 4, 26, "Input",ExpressionUUID->"8ee863b5-d147-4e8a-bd18-9c421dd23787"],
+Cell[CellGroupData[{
+Cell[4605558, 100099, 197, 4, 24, "Print",ExpressionUUID->"2009a193-ceea-46ef-bd80-037d926017cf"],
+Cell[4605758, 100105, 199, 4, 24, "Print",ExpressionUUID->"0a74d1db-0a55-41c7-a355-eca543eb70e7"],
+Cell[4605960, 100111, 197, 4, 24, "Print",ExpressionUUID->"e55077bb-d892-44dc-b006-f69eb07618f5"],
+Cell[4606160, 100117, 197, 4, 24, "Print",ExpressionUUID->"55c1e9be-56a5-4944-b983-985ca4b80876"],
+Cell[4606360, 100123, 197, 4, 24, "Print",ExpressionUUID->"17abba4e-1848-488c-bde6-35cdf05998d4"],
+Cell[4606560, 100129, 199, 4, 24, "Print",ExpressionUUID->"8842af6b-8a1e-48e1-98ef-18ca8f39a91d"],
+Cell[4606762, 100135, 197, 4, 24, "Print",ExpressionUUID->"c65f5711-d87e-4702-85dc-948bb2237f08"],
+Cell[4606962, 100141, 197, 4, 24, "Print",ExpressionUUID->"c6fbe64a-ceca-439e-8b29-9c26adf965ef"],
+Cell[4607162, 100147, 199, 4, 24, "Print",ExpressionUUID->"9fcc8d20-19ef-45d4-bc4b-aefbb0a6e431"],
+Cell[4607364, 100153, 197, 4, 24, "Print",ExpressionUUID->"3f30f015-4bfc-47f5-99d8-e3f68011c8c2"]
+}, Open ]],
+Cell[4607576, 100160, 196, 3, 34, "Output",ExpressionUUID->"6069c659-d902-4918-a553-fc39b0ec194b"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4607809, 100168, 241, 4, 26, "Input",ExpressionUUID->"71acea69-b2b3-491d-ae15-f4df099b9b39"],
+Cell[CellGroupData[{
+Cell[4608075, 100176, 199, 4, 24, "Print",ExpressionUUID->"4145e9a2-b86f-444d-9e6f-514e102a7a17"],
+Cell[4608277, 100182, 197, 4, 24, "Print",ExpressionUUID->"0f110600-9945-4ce8-ada0-239cd91d8e03"],
+Cell[4608477, 100188, 199, 4, 24, "Print",ExpressionUUID->"f8453fc4-a721-4441-9016-2af31abf7022"],
+Cell[4608679, 100194, 196, 4, 24, "Print",ExpressionUUID->"e7b4daf0-0724-4551-8ded-34ecced4ec32"],
+Cell[4608878, 100200, 197, 4, 24, "Print",ExpressionUUID->"654cff30-d67b-463f-9d66-f38a5cbd6e2c"],
+Cell[4609078, 100206, 197, 4, 24, "Print",ExpressionUUID->"0398c397-cea0-48c6-adee-2da2335e66cb"],
+Cell[4609278, 100212, 197, 4, 24, "Print",ExpressionUUID->"0f95316d-23be-46b1-8fb4-6dfdb7e99fe2"],
+Cell[4609478, 100218, 199, 4, 24, "Print",ExpressionUUID->"0996f87d-8f52-4872-8581-efb748040ff9"],
+Cell[4609680, 100224, 197, 4, 24, "Print",ExpressionUUID->"6098c8b1-ad3d-4b8a-850a-4b9fb5e363cf"],
+Cell[4609880, 100230, 197, 4, 24, "Print",ExpressionUUID->"57383c2a-c8e3-461c-bd50-359a76498569"]
+}, Open ]],
+Cell[4610092, 100237, 196, 3, 34, "Output",ExpressionUUID->"abee5d57-ae1c-4b68-8896-520cd5335c43"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4610325, 100245, 243, 4, 26, "Input",ExpressionUUID->"75b90654-1ac3-4894-8e5d-81d701b5e39a"],
+Cell[CellGroupData[{
+Cell[4610593, 100253, 197, 4, 24, "Print",ExpressionUUID->"eea3546e-d9ee-471e-845d-31f4851702d4"],
+Cell[4610793, 100259, 196, 4, 24, "Print",ExpressionUUID->"aedb175e-f30c-4a30-9760-18498d2f5ebb"],
+Cell[4610992, 100265, 197, 4, 24, "Print",ExpressionUUID->"9ef01fde-35d5-4cdb-8e20-06150be4917d"],
+Cell[4611192, 100271, 196, 4, 24, "Print",ExpressionUUID->"801f39b3-2897-4def-aace-35be798602f1"],
+Cell[4611391, 100277, 199, 4, 24, "Print",ExpressionUUID->"4524b0a4-c3cf-4eee-9bae-4a4411158765"],
+Cell[4611593, 100283, 199, 4, 24, "Print",ExpressionUUID->"9ad23010-af47-4eb5-80b1-72cc7a2f8eb2"],
+Cell[4611795, 100289, 196, 4, 24, "Print",ExpressionUUID->"9a39c0cc-b71d-4bfb-b47a-e3532770aa9b"],
+Cell[4611994, 100295, 199, 4, 24, "Print",ExpressionUUID->"e9a4811a-4dfc-4847-9ed8-9f5e7fb0a1bd"],
+Cell[4612196, 100301, 197, 4, 24, "Print",ExpressionUUID->"4a551457-b8aa-425f-b484-9ebe7095e485"],
+Cell[4612396, 100307, 196, 4, 24, "Print",ExpressionUUID->"ed43c117-5a2c-4198-9efb-7da7dd4d4034"]
+}, Open ]],
+Cell[4612607, 100314, 196, 3, 34, "Output",ExpressionUUID->"1a9dd832-cded-404a-9e8e-55603b4d7433"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4612840, 100322, 292, 5, 26, "Input",ExpressionUUID->"f824d033-691a-4d1f-92f5-4ab01423a5ad"],
+Cell[CellGroupData[{
+Cell[4613157, 100331, 177, 4, 24, "Print",ExpressionUUID->"92d7c1bd-c362-4205-9f66-6a01b447a4eb"],
+Cell[4613337, 100337, 175, 4, 24, "Print",ExpressionUUID->"54df0102-003b-4884-bb53-111b767a4c0f"],
+Cell[4613515, 100343, 174, 4, 24, "Print",ExpressionUUID->"42fe5d37-9e86-4d1b-b9a2-35370152be1a"],
+Cell[4613692, 100349, 177, 4, 24, "Print",ExpressionUUID->"e05f68ba-59c9-4014-82ba-94955347b056"]
+}, Open ]],
+Cell[4613884, 100356, 174, 3, 34, "Output",ExpressionUUID->"52db8c9f-9b99-4b63-bfd9-226b29998173"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4614095, 100364, 228, 4, 26, "Input",ExpressionUUID->"e1619147-dbd8-4b95-92c0-a0a9e3d6e05f"],
+Cell[4614326, 100370, 729, 19, 46, "Output",ExpressionUUID->"6b31f62a-bb61-4325-bbb2-0f8b38f9d9b0"]
+}, Open ]],
+Cell[4615070, 100392, 200, 4, 32, "Item",ExpressionUUID->"b8f7dd32-654c-4d69-a388-00e73e20b2c5"],
+Cell[CellGroupData[{
+Cell[4615295, 100400, 639, 16, 52, "Input",ExpressionUUID->"6385e4e6-3aa6-4ca7-8de4-83d30633a5ae"],
+Cell[4615937, 100418, 158, 2, 34, "Output",ExpressionUUID->"20e798ff-b0ce-4e4d-8da1-a093ebf96720"]
+}, Open ]],
+Cell[4616110, 100423, 184, 4, 30, "Input",ExpressionUUID->"35538101-3df6-4320-82c6-fb90398dcf8b"],
+Cell[CellGroupData[{
+Cell[4616319, 100431, 241, 4, 30, "Input",ExpressionUUID->"c6f1e48f-f2b3-4633-a270-2d837481a3a1"],
+Cell[4616563, 100437, 396, 10, 24, "Message",ExpressionUUID->"da0ce5b5-a752-4f0c-81a9-b9f06d7ab115"],
+Cell[4616962, 100449, 394, 10, 24, "Message",ExpressionUUID->"be0f414f-c102-4bf4-9e35-0d311e65c76f"],
+Cell[CellGroupData[{
+Cell[4617381, 100463, 177, 4, 24, "Print",ExpressionUUID->"3bba7d8f-9b06-484f-b4d3-632f231afc37"],
+Cell[4617561, 100469, 177, 4, 24, "Print",ExpressionUUID->"f659f692-01ec-4858-acaa-d60f4b4998e6"],
+Cell[4617741, 100475, 175, 4, 24, "Print",ExpressionUUID->"e9e35560-6a98-4d85-ba46-29424be208af"],
+Cell[4617919, 100481, 177, 4, 24, "Print",ExpressionUUID->"5d1876d0-f98c-4bb2-9711-124711ea1dab"],
+Cell[4618099, 100487, 175, 4, 24, "Print",ExpressionUUID->"ae667c6d-6a3b-4b8a-9bf8-9c76aa4faf28"]
+}, Open ]],
+Cell[4618289, 100494, 247, 4, 34, "Output",ExpressionUUID->"88acd967-1c2c-4b4e-b73d-ecbd06540448"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4618573, 100503, 241, 4, 26, "Input",ExpressionUUID->"8d487f69-3cc5-4b15-a17c-36b0f0a098da"],
+Cell[CellGroupData[{
+Cell[4618839, 100511, 175, 4, 24, "Print",ExpressionUUID->"2846bb9c-a0e3-4cc6-9863-49dc879372fb"],
+Cell[4619017, 100517, 175, 4, 24, "Print",ExpressionUUID->"8e8e94ae-2685-46cf-824c-9dccd6aaa7c9"],
+Cell[4619195, 100523, 175, 4, 24, "Print",ExpressionUUID->"ea5a6e57-459b-44f3-af8d-e27fd9f73504"],
+Cell[4619373, 100529, 175, 4, 24, "Print",ExpressionUUID->"236d0628-1541-4ee1-8294-d993f0d4fc6b"],
+Cell[4619551, 100535, 175, 4, 24, "Print",ExpressionUUID->"41931755-f8dd-4016-8ec3-12f189f6c48b"],
+Cell[4619729, 100541, 177, 4, 24, "Print",ExpressionUUID->"87cc3efa-15c5-4aac-9f59-fc77c411956d"],
+Cell[4619909, 100547, 175, 4, 24, "Print",ExpressionUUID->"c28fc9bb-8175-41ae-b5b8-a2af110aa01e"],
+Cell[4620087, 100553, 175, 4, 24, "Print",ExpressionUUID->"c804e0fc-13b8-404c-be08-a7e750465f41"],
+Cell[4620265, 100559, 175, 4, 24, "Print",ExpressionUUID->"017215f5-e5a5-412a-95b0-02e856ef17cf"],
+Cell[4620443, 100565, 175, 4, 24, "Print",ExpressionUUID->"27abe593-5557-4139-b432-a9d130c93652"]
+}, Open ]],
+Cell[4620633, 100572, 174, 3, 34, "Output",ExpressionUUID->"27df6f47-5fa2-4e39-b7f2-afc3c720e098"]
+}, Closed]],
+Cell[4620822, 100578, 190, 5, 26, "Input",ExpressionUUID->"df98973f-1c7c-43bf-ada2-bc8f065d9ee0"],
+Cell[CellGroupData[{
+Cell[4621037, 100587, 319, 6, 30, "Input",ExpressionUUID->"2649d505-baee-414f-ba61-a848c431375f"],
+Cell[CellGroupData[{
+Cell[4621381, 100597, 177, 4, 24, "Print",ExpressionUUID->"d990281d-da4e-44ce-bba0-3be9e51984c8"],
+Cell[4621561, 100603, 175, 4, 24, "Print",ExpressionUUID->"8e564ec2-2ba2-4af6-8839-241a48c4b011"]
+}, Open ]]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4621785, 100613, 270, 6, 26, "Input",ExpressionUUID->"e440a8fa-6daf-4e52-952c-f2a2da027d58"],
+Cell[CellGroupData[{
+Cell[4622080, 100623, 175, 4, 24, "Print",ExpressionUUID->"47e9eb29-eb3c-44eb-bde5-daa461e7965a"],
+Cell[4622258, 100629, 175, 4, 24, "Print",ExpressionUUID->"3c8d7c90-91f7-46fd-ac69-8701bacfe25a"],
+Cell[4622436, 100635, 175, 4, 24, "Print",ExpressionUUID->"44a1988b-44c7-4cc4-accc-daccc86bdfec"]
+}, Open ]]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4622660, 100645, 273, 6, 26, "Input",ExpressionUUID->"ccd5003b-7be8-4452-a781-58d0de738e3e"],
+Cell[CellGroupData[{
+Cell[4622958, 100655, 177, 4, 24, "Print",ExpressionUUID->"590c91e2-ef3c-4505-aa0b-95d55137b2bb"],
+Cell[4623138, 100661, 175, 4, 24, "Print",ExpressionUUID->"69d37e74-c56f-4a12-bc84-953b1ee45562"],
+Cell[4623316, 100667, 175, 4, 24, "Print",ExpressionUUID->"400a6676-c5b0-4df1-b6bb-83a59b331179"]
+}, Open ]]
+}, Closed]],
+Cell[4623518, 100675, 190, 5, 26, "Input",ExpressionUUID->"07237824-5e81-41b0-bd1d-7d744858c3ed"],
+Cell[4623711, 100682, 245, 4, 30, "Input",ExpressionUUID->"4d28e53c-4af5-40ba-890a-a6a9f9544d99"],
+Cell[4623959, 100688, 245, 4, 30, "Input",ExpressionUUID->"712b80aa-b8c4-4294-a783-8d276a083f12"],
+Cell[CellGroupData[{
+Cell[4624229, 100696, 245, 4, 30, "Input",ExpressionUUID->"0121b0f2-33a2-4f93-abd0-b7335f00f4ba"],
+Cell[4624477, 100702, 482, 11, 24, "Message",ExpressionUUID->"535114a6-b030-4308-8246-00c024410468"],
+Cell[4624962, 100715, 488, 11, 24, "Message",ExpressionUUID->"3fff711e-1dcc-463e-a740-414e01e7545b"],
+Cell[4625453, 100728, 200, 4, 24, "Print",ExpressionUUID->"02b1fe8c-97b1-4f62-af5e-560a0f061657"],
+Cell[4625656, 100734, 485, 11, 24, "Message",ExpressionUUID->"4d229124-7f85-4bce-9345-8223a1b56caa"],
+Cell[4626144, 100747, 488, 11, 24, "Message",ExpressionUUID->"9b026f9b-c1da-4642-96e1-ffec3e99e1ad"],
+Cell[4626635, 100760, 200, 4, 24, "Print",ExpressionUUID->"ee45a9cb-8f55-46b4-86d8-aa90b6d7b196"],
+Cell[4626838, 100766, 483, 11, 24, "Message",ExpressionUUID->"3f134fed-054a-4e7f-bf83-da4ec88b63a5"],
+Cell[4627324, 100779, 478, 10, 24, "Message",ExpressionUUID->"deb651cd-9750-4f33-8892-dc4873ea19f8"],
+Cell[4627805, 100791, 490, 11, 24, "Message",ExpressionUUID->"5597723e-0b2d-4d43-b93e-f96034ffcb06"],
+Cell[4628298, 100804, 476, 10, 24, "Message",ExpressionUUID->"8ef06157-c74b-48e8-9c7f-327d7302c28c"],
+Cell[CellGroupData[{
+Cell[4628799, 100818, 200, 4, 24, "Print",ExpressionUUID->"6d010356-450e-479a-ba67-eeb3e26ec291"],
+Cell[4629002, 100824, 202, 4, 24, "Print",ExpressionUUID->"3f15cc52-1ff6-45cb-a9fd-644d776c5f89"],
+Cell[4629207, 100830, 200, 4, 24, "Print",ExpressionUUID->"4feea194-42f6-4ca1-9312-62f92ec665a5"],
+Cell[4629410, 100836, 202, 4, 24, "Print",ExpressionUUID->"6258c9d5-91a7-48d5-8231-34e495c40fa5"],
+Cell[4629615, 100842, 200, 4, 24, "Print",ExpressionUUID->"ffc76446-691d-4b15-befd-5803a78522c1"],
+Cell[4629818, 100848, 200, 4, 24, "Print",ExpressionUUID->"0837e534-d7bb-47f7-aed6-303356623331"],
+Cell[4630021, 100854, 202, 4, 24, "Print",ExpressionUUID->"f10d2730-aa78-4b6e-80cd-badb4c9a088b"],
+Cell[4630226, 100860, 200, 4, 24, "Print",ExpressionUUID->"38a8da08-2436-4aa2-9ed3-acd6b62059aa"]
+}, Open ]],
+Cell[4630441, 100867, 198, 3, 34, "Output",ExpressionUUID->"3bacc01c-d443-45cd-8552-6920b7d54570"]
+}, Closed]],
+Cell[4630654, 100873, 224, 5, 26, "Input",ExpressionUUID->"0a825a05-32b2-4319-8639-70ebb7dae721"],
+Cell[4630881, 100880, 226, 5, 30, "Input",ExpressionUUID->"e4a86cf3-8ee8-4a68-8635-217b0ba4a640"],
+Cell[4631110, 100887, 223, 5, 30, "Input",ExpressionUUID->"4e14b37b-639b-46ea-b50a-b14416358740"],
+Cell[4631336, 100894, 226, 5, 30, "Input",ExpressionUUID->"bf2275c2-8d1c-4d02-b7e4-41137641140c"],
+Cell[4631565, 100901, 224, 5, 30, "Input",ExpressionUUID->"6e0c2be4-ee3a-45fa-b831-83a1095ac1be"],
+Cell[4631792, 100908, 224, 5, 30, "Input",ExpressionUUID->"9186e914-9912-4033-a987-f84144195af6"],
+Cell[4632019, 100915, 224, 5, 30, "Input",ExpressionUUID->"f6a2e77b-0b25-4468-8b4c-79e5f414742d"],
+Cell[4632246, 100922, 222, 5, 30, "Input",ExpressionUUID->"a3b27975-8859-466d-a7c0-b105c7fe73d9"],
+Cell[4632471, 100929, 1318, 40, 94, "Input",ExpressionUUID->"25926e05-bb3c-422b-8e2b-9a57e964ba2b"],
+Cell[CellGroupData[{
+Cell[4633814, 100973, 553, 12, 94, "Input",ExpressionUUID->"a36cae1e-df45-49d4-a412-416ac62654e5"],
+Cell[4634370, 100987, 498, 14, 46, "Output",ExpressionUUID->"a396975e-2717-4a82-90d1-7c091fb198e9"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4634905, 101006, 258, 6, 30, "Input",ExpressionUUID->"9b7c4721-c242-428f-936b-c73b023c8d5b"],
+Cell[4635166, 101014, 632, 18, 56, "Output",ExpressionUUID->"234fb216-0308-486e-aa4f-ee9ceb3aa02b"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4635835, 101037, 261, 6, 30, "Input",ExpressionUUID->"38f9a86e-2833-456d-aa7a-12baa82bf6d4"],
+Cell[4636099, 101045, 1757, 56, 85, "Output",ExpressionUUID->"1c05b19f-f3b9-494a-b37f-364f77e0b0b1"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4637893, 101106, 1315, 34, 94, "Input",ExpressionUUID->"b2c199ef-3321-44d3-a08a-1b1de3e1b269"],
+Cell[4639211, 101142, 8708, 229, 381, "Output",ExpressionUUID->"f04f6eb6-3a6c-42bd-b978-23a251c30109"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4647956, 101376, 1021, 29, 69, "Input",ExpressionUUID->"a7e9b28f-cd05-4629-a301-685337db32b1"],
+Cell[4648980, 101407, 8656, 228, 381, "Output",ExpressionUUID->"fb8aa450-fac0-43d2-94fb-164b894fd43e"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4657673, 101640, 558, 13, 48, "Input",ExpressionUUID->"1e5b2a80-6558-4a6a-a208-6ffd66be10ca"],
+Cell[4658234, 101655, 155, 3, 34, "Output",ExpressionUUID->"ba76a9bc-1692-4293-93e4-3b98a9ab7916"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4658426, 101663, 993, 28, 73, "Input",ExpressionUUID->"0c715131-89c6-40ef-8f9e-32d8bd8c07e3"],
+Cell[4659422, 101693, 6402, 173, 229, "Output",ExpressionUUID->"ee09fd16-2531-4ab1-be6d-4d7237f2c0f6"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4665861, 101871, 1136, 31, 69, "Input",ExpressionUUID->"192cc319-c4e4-49c2-9aae-8c5e3d52b6b5"],
+Cell[4667000, 101904, 8682, 228, 381, "Output",ExpressionUUID->"72f30e8f-2cdf-4cf1-b2ac-4bad814133c2"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4675719, 102137, 453, 12, 48, "Input",ExpressionUUID->"aa4bbc56-9042-4ac4-9da9-d8a6a099ffb0"],
+Cell[4676175, 102151, 3697, 95, 120, "Output",ExpressionUUID->"5dd7bd0b-df4b-42b4-afa6-169da77820b0"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4679909, 102251, 493, 12, 52, "Input",ExpressionUUID->"acbb6382-4324-4bfb-aa84-71272d55c7d4"],
+Cell[4680405, 102265, 156, 3, 34, "Output",ExpressionUUID->"f4100da3-c681-47f2-ac13-8b324b099b4e"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[4680598, 102273, 414, 10, 52, "Input",ExpressionUUID->"1be0f3b4-e047-4a26-9afa-df89d8bb25eb"],
+Cell[4681015, 102285, 3754, 97, 120, "Output",ExpressionUUID->"481fa417-77b8-4946-b4f9-04ed930e142d"]
+}, Open ]],
+Cell[4684784, 102385, 304, 6, 157, "Input",ExpressionUUID->"1e1abde8-f7ad-44b1-99b4-1370e978f66d"]
+}
+]
+*)
+
--
GitLab